home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1996 April / Macworld (1996-04).dmg / Shareware World / Entertainment / General / Xconq 7.0.1 / lib / quest.g < prev    next >
Text File  |  1995-08-22  |  2KB  |  111 lines
  1. (game-module "quest"
  2.   (title "Quest for XP")
  3.   (blurb "Type definitions for fantasy role-playing")
  4.   (variants (see-all false))
  5. )
  6.  
  7. (unit-type human (image-name "person") (char "@"))
  8.  
  9. (unit-type orc)
  10. (unit-type elf)
  11. (unit-type dwarf)
  12. (unit-type bugbear)
  13. (unit-type dragon)
  14.  
  15. (define monster (orc elf dwarf bugbear dragon))
  16. (define animate (append human monster))
  17.  
  18. (material-type food)
  19. (material-type water)
  20. (material-type gold)
  21.  
  22. (include "stdterr")
  23.  
  24. ;;; Static relationships.
  25.  
  26. (include "ng-weird")
  27.  
  28. (add human namer "generic-names")
  29.  
  30. (add human possible-sides "human")
  31.  
  32. (add monster possible-sides "monster")
  33.  
  34. (table unit-storage-x
  35.   (human m* (10 5 100))
  36.   )
  37.  
  38. ;;; Action parameters.
  39.  
  40. (add u* acp-per-turn 4)
  41.  
  42. ;;; Movement parameters.
  43.  
  44. (table mp-to-enter-terrain
  45.   (u* mountains 10)
  46.   (dragon mountains 0)
  47.   )
  48.  
  49. ;;; Combat parameters.
  50.  
  51. (add u* hp-max 10)
  52.  
  53. (table hit-chance
  54.   (u* u* 50)
  55.   )
  56.  
  57. (table damage
  58.   (u* u* 1)
  59.   )
  60.  
  61. ;;; Backdrop activities.
  62.  
  63. (add u* hp-recovery 100)
  64.  
  65. ;;; Random setup.
  66.  
  67. ;;; One adventurer on a side.
  68.  
  69. (add human start-with 1)
  70.  
  71. (add monster start-with 2)
  72.  
  73. (set country-radius-min 4)
  74. (set country-separation-min 15)
  75. (set country-separation-max 20)
  76.  
  77. (table favored-terrain
  78.   (u* (sea shallows) 0) 
  79.   (u* plains 100)
  80.   )
  81.  
  82. ;(set synthesis-methods
  83. ;  '(make-maze-terrain make-countries make-independent-units))
  84.  
  85. (set sides-min 1)
  86.  
  87. (side 1 (name "You") (class "human"))
  88.  
  89. (side 2 (noun "Monster") (class "monster") (emblem-name "none"))
  90.  
  91. (scorekeeper (do last-side-wins))
  92.  
  93. (game-module (notes (
  94.   "This is a sort of outdoors adventure for individual adventurers."
  95.   )))
  96.  
  97. ;;; Can live off friendly terrain, else must carry n days of food/water.
  98. ;;; Various pieces of equipment available.
  99.  
  100. ;;; Have nobrains machine-run sides for countries, towns, castles, etc.
  101. ;;; (or quiescent unless player becomes outlaw?)
  102.  
  103. ;;; Monsters belong to sides defined by alignment.  Sides of matching
  104. ;;; alignment friendly, etc.  No brains to side, but player could run
  105. ;;; a monster side, just for fun.
  106. ;;; Monsters can breed periodically, but limit total # somehow.
  107.  
  108. ;;; Win by collecting the most treasure after <n> turns.
  109. ;;; Treasure should be hidden inside towns, carried by monsters.
  110.  
  111.